object frmModeloBusca: TfrmModeloBusca
  Left = 0
  Top = 0
  Caption = 'Form de Busca Padr'#227'o'
  ClientHeight = 302
  ClientWidth = 478
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  Position = poMainFormCenter
  PixelsPerInch = 96
  TextHeight = 13
  object pnlInferior: TPanel
    Left = 0
    Top = 261
    Width = 478
    Height = 41
    Align = alBottom
    TabOrder = 0
    ExplicitTop = 256
    DesignSize = (
      478
      41)
    object btnCancelar: TBitBtn
      Left = 336
      Top = 6
      Width = 131
      Height = 25
      Anchors = [akRight, akBottom]
      Caption = 'Voltar'
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        333333333333333333FF3333333333333744333333333333F773333333333337
        44473333333333F777F3333333333744444333333333F7733733333333374444
        4433333333F77333733333333744444447333333F7733337F333333744444444
        433333F77333333733333744444444443333377FFFFFFF7FFFFF999999999999
        9999733777777777777333CCCCCCCCCC33333773FF333373F3333333CCCCCCCC
        C333333773FF3337F333333333CCCCCCC33333333773FF373F3333333333CCCC
        CC333333333773FF73F33333333333CCCCC3333333333773F7F3333333333333
        CCC333333333333777FF33333333333333CC3333333333333773}
      NumGlyphs = 2
      TabOrder = 0
      OnClick = btnCancelarClick
    end
  end
  object DBGridBusca: TDBGrid
    Left = 0
    Top = 105
    Width = 478
    Height = 156
    Hint = 
      'Use o bot'#227'o direito do mouse para visualizar as fun'#231#245'es auxiliar' +
      'es'
    Align = alClient
    DataSource = dsBusca
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit, dgTitleClick, dgTitleHotTrack]
    ParentShowHint = False
    PopupMenu = popupRemover
    ShowHint = True
    TabOrder = 1
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'Tahoma'
    TitleFont.Style = []
    OnDrawColumnCell = DBGridBuscaDrawColumnCell
    Columns = <
      item
        Expanded = False
        Title.Caption = 'C'#243'digo'
        Width = 99
        Visible = True
      end
      item
        Expanded = False
        Title.Caption = 'Descri'#231#227'o'
        Width = 339
        Visible = True
      end>
  end
  object pnlSuperior: TPanel
    Left = 0
    Top = 0
    Width = 478
    Height = 105
    Align = alTop
    TabOrder = 2
    object lblTituloForm: TLabel
      Left = 8
      Top = 6
      Width = 166
      Height = 23
      Caption = 'Titulo Formulario'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -19
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object Label1: TLabel
      Left = 8
      Top = 35
      Width = 93
      Height = 13
      Caption = 'Pesquisa Avan'#231'ada'
    end
    object lblDica: TLabel
      Left = 8
      Top = 86
      Width = 372
      Height = 13
      Caption = 
        'Use o bot'#227'o direito do mouse para visualizar as fun'#231#245'es auxiliar' +
        'es'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clGray
      Font.Height = -11
      Font.Name = 'Tahoma'
      Font.Style = [fsBold]
      ParentFont = False
    end
    object edtPesquisaAvancada: TEdit
      Left = 8
      Top = 54
      Width = 265
      Height = 21
      TabOrder = 0
      OnKeyPress = edtPesquisaAvancadaKeyPress
    end
  end
  object qrBusca: TSQLQuery
    MaxBlobSize = -1
    Params = <>
    SQLConnection = frmPrincipal.Conexao
    Left = 16
    Top = 128
  end
  object cdsBusca: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspBusca'
    Left = 80
    Top = 128
  end
  object dspBusca: TDataSetProvider
    DataSet = qrBusca
    Left = 48
    Top = 128
  end
  object dsBusca: TDataSource
    DataSet = cdsBusca
    Left = 112
    Top = 128
  end
  object popupRemover: TPopupMenu
    OnPopup = popupRemoverPopup
    Left = 424
    Top = 128
    object Copiar2: TMenuItem
      Caption = 'Copiar C'#243'digo'
      OnClick = Copiar2Click
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object Remover1: TMenuItem
      Caption = 'Remover'
    end
  end
  object qrRemover: TSQLQuery
    MaxBlobSize = -1
    Params = <>
    SQL.Strings = (
      '')
    SQLConnection = frmPrincipal.Conexao
    Left = 16
    Top = 160
  end
end
